﻿''' <summary>
''' 文件信息类 (UpperAirStations)
''' </summary>
''' <remarks></remarks>
<Serializable()> Public Class UpperAirStations
    Implements ICloneable

    ''' <summary>
    ''' 第一个文件名 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_FileNameIn As String
    ''' <summary>
    ''' 第二个文件名 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_FileNameSub As String
    ''' <summary>
    ''' 第一个文件路径 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_FilePathIn As String
    ''' <summary>
    ''' 第二个文件路径 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_FilePathSub As String
    ''' <summary>
    ''' 第二个文件的类型 (Integer)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_FileTypeSub As Integer = 0
    ''' <summary>
    ''' 格式
    ''' </summary>
    ''' <remarks></remarks>
    Private m_Format As Integer = 2
    ''' <summary>
    ''' 转换文件名
    ''' </summary>
    ''' <remarks></remarks>
    Private m_Transform As Boolean = False
    ''' <summary>
    ''' 站台编号 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_StationID As String

    ''' <summary>
    ''' 纬度(Double)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_Latitude As Double
    ''' <summary>
    ''' 纬度标识 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_LatitudeCode As String
    ''' <summary>
    ''' 经度(Double)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_Longitude As Double
    ''' <summary>
    ''' 经度标识 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_LongitudeCode As String




    ''' <summary>
    ''' 第一个文件名 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property FileNameIn() As String
        Get
            Return Me.m_FileNameIn
        End Get
        Set(ByVal value As String)
            Me.m_FileNameIn = value
        End Set
    End Property
    ''' <summary>
    ''' 第二个文件名 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property FileNameSub() As String
        Get
            Return Me.m_FileNameSub
        End Get
        Set(ByVal value As String)
            Me.m_FileNameSub = value
        End Set
    End Property
    ''' <summary>
    ''' 第一个文件路径 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property FilePathIn() As String
        Get
            Return Me.m_FilePathIn
        End Get
        Set(ByVal value As String)
            Me.m_FilePathIn = value
        End Set
    End Property
    ''' <summary>
    ''' 第二个文件路径 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property FilePathSub() As String
        Get
            Return Me.m_FilePathSub
        End Get
        Set(ByVal value As String)
            Me.m_FilePathSub = value
        End Set
    End Property
    ''' <summary>
    '''  第二个文件的类型 (Integer)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property FileTypeSub() As Integer
        Get
            Return Me.m_FileTypeSub
        End Get
        Set(ByVal value As Integer)
            Me.m_FileTypeSub = value
        End Set
    End Property
    ''' <summary>
    ''' 格式 (Integer)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Format() As Integer
        Get
            Return Me.m_Format
        End Get
        Set(ByVal value As Integer)
            Me.m_Format = value
        End Set
    End Property
    ''' <summary>
    ''' 转换文件名 (Boolean)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Transform() As Boolean
        Get
            Return Me.m_Transform
        End Get
        Set(ByVal value As Boolean)
            Me.m_Transform = value
        End Set
    End Property
    ''' <summary>
    ''' 站台编号 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property StationID() As String
        Get
            Return Me.m_StationID
        End Get
        Set(ByVal value As String)
            Me.m_StationID = value
        End Set
    End Property
    ''' <summary>
    ''' 纬度(Double)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Latitude() As Double
        Get
            Return Me.m_Latitude
        End Get
        Set(ByVal value As Double)
            Me.m_Latitude = value
        End Set
    End Property
    ''' <summary>
    ''' 纬度标识 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property LatitudeCode() As String
        Get
            Return Me.m_LatitudeCode
        End Get
        Set(ByVal value As String)
            Me.m_LatitudeCode = value
        End Set
    End Property
    ''' <summary>
    '''  经度(Double)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Longitude() As Double
        Get
            Return Me.m_Longitude
        End Get
        Set(ByVal value As Double)
            Me.m_Longitude = value
        End Set
    End Property
    ''' <summary>
    ''' 经度标识 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property LongitudeCode() As String
        Get
            Return Me.m_LongitudeCode
        End Get
        Set(ByVal value As String)
            Me.m_LongitudeCode = value
        End Set
    End Property

    Public Function Clone() As Object Implements System.ICloneable.Clone
        Dim obj As New UpperAirStations
        obj.FileNameIn = Me.m_FileNameIn
        obj.FileNameSub = Me.m_FileNameSub
        obj.FilePathIn = Me.m_FilePathIn
        obj.FilePathSub = Me.m_FilePathSub
        obj.FileTypeSub = Me.m_FileTypeSub
        obj.Format = Me.m_Format
        obj.Transform = Me.m_Transform
        obj.StationID = Me.m_StationID
        obj.Latitude = Me.m_Latitude
        obj.LatitudeCode = Me.m_LatitudeCode
        obj.Longitude = Me.m_Longitude
        obj.LongitudeCode = Me.m_LongitudeCode
        Return obj
    End Function
End Class
